[[1]]
[[2]]
[[3]]
[[4]]
[[5]]
[[6]]
[[7]]
[[8]]
[[9]]
[[10]]
[[11]]
[[12]]












Timeseries
Speed
#Boxplots all
df_superhotedges_april16pt %>%
filter(speed > 0) %>%
group_by(hour = hour(time)) %>%
plot_ly(x= ~hour, y= ~(speed*18)/5, type = 'box',boxpoints = FALSE) %>%
layout(title = paste("Avg speed per hour" ),
yaxis = list(title="Speed (km/h)"),
xaxis = list(title="Hour"))
All timeseries per way_id
[[1]]
[[2]]
[[3]]
[[4]]
[[5]]
[[6]]
[[7]]
[[8]]
[[9]]
[[10]]
[[11]]
[[12]]
NA
Timeseries speed average per way_id
Per week.
Per hour.
Per day.
Number of sessions
Timeseries speed average per way_id
Intersession time
lapply(1:12, FUN = inter_h)
LS0tCnRpdGxlOiAiVGltZSBzZXJpZXMgbGlnaHQgdG9wIHdheV9pZHMiCm91dHB1dDogaHRtbF9ub3RlYm9vawotLS0KCmBgYHtyIGVjaG89RkFMU0V9Cm1fdG9wNTAgPC0gbQptX3RvcDUwCmBgYAoKYGBge3IgZWNobz1GQUxTRSwgbWVzc2FnZT1GQUxTRX0KdHNlcmllc19saWdodCA8LSBmdW5jdGlvbihpbmRleCkgeyBkZl9zdXBlcmhvdGVkZ2VzX2FwcmlsMTZwdCAlPiUgCiAgZmlsdGVyKCB3YXlfaWQgPT0gbGlzdF9vc21fZWRnZVtpbmRleF0gKSAlPiUgCiAgZ2dwbG90KGFlcyh4PSB0aW1lLCB5PSAoc3BlZWQqMTgpLzUpKSArIAogIGdlb21fcG9pbnQoYWVzKGNvbG91ciA9IGNsYXNzKSwgYWxwaGEgPSAxLzEwKSArIAogIHlsYWIoIlNwZWVkKGttL2gpIikgKyAKICB4bGFiKCJEYXRlIikrIAogIGdndGl0bGUocGFzdGUoIlRpbWUgc2VyaWVzIG9mIHNwZWVkIGZvciB3YXlfaWQiLGxpc3Rfb3NtX2VkZ2VbaW5kZXhdLCBzZXAgPSAiICIgKSl9CgoKYGBgCgpgYGB7ciBlY2hvPUZBTFNFfQpsYXBwbHkoMToxMiwgRlVOID0gdHNlcmllc19saWdodCkKYGBgCgojVGltZXNlcmllcyAKCiMjIFNwZWVkICAKYGBge3J9CiNCb3hwbG90cyBhbGwgCmRmX3N1cGVyaG90ZWRnZXNfYXByaWwxNnB0ICU+JSAKICBmaWx0ZXIoc3BlZWQgPiAwKSAlPiUgCiAgZ3JvdXBfYnkoaG91ciA9IGhvdXIodGltZSkpICU+JSAKICBwbG90X2x5KHg9IH5ob3VyLCB5PSB+KHNwZWVkKjE4KS81LCB0eXBlID0gJ2JveCcsYm94cG9pbnRzID0gRkFMU0UpICU+JSAKICBsYXlvdXQodGl0bGUgPSBwYXN0ZSgiQXZnIHNwZWVkIHBlciBob3VyIiApLAogICAgICAgICB5YXhpcyA9IGxpc3QodGl0bGU9IlNwZWVkIChrbS9oKSIpLAogICAgICAgICB4YXhpcyA9IGxpc3QodGl0bGU9IkhvdXIiKSkKYGBgCgojIyBBbGwgdGltZXNlcmllcyBwZXIgd2F5X2lkCgpgYGB7ciBlY2hvPUZBTFNFLCBtZXNzYWdlPUZBTFNFfQpsYXBwbHkoMToxMiwgRlVOID0gdHNlcmllcykKYGBgCgoKIyMjIFRpbWVzZXJpZXMgc3BlZWQgYXZlcmFnZSBwZXIgd2F5X2lkCgpgYGB7ciBlY2hvPUZBTFNFLCBtZXNzYWdlPUZBTFNFfQpsYXBwbHkoMToxMiwgRlVOID0gdHNlcmllc19zcGVlZCkKYGBgCgojIyMgUGVyIHdlZWsuIApgYGB7ciBlY2hvPUZBTFNFLCBtZXNzYWdlPUZBTFNFfQpsYXBwbHkoMToxMiwgRlVOID0gdHNlcmllc19hdmdfdykKYGBgCgojIyMgUGVyIGhvdXIuIApgYGB7ciBlY2hvPUZBTFNFLCBtZXNzYWdlPUZBTFNFfQpsYXBwbHkoMToxMiwgRlVOID0gdHNlcmllc19hdmdfaCkKYGBgCgojIyMgUGVyIGRheS4KYGBge3IgZWNobz1GQUxTRSwgbWVzc2FnZT1GQUxTRX0KbGFwcGx5KDE6MTIsIEZVTiA9IHRzZXJpZXNfYXZnX2QpCmBgYAoKCgoKIyMgTnVtYmVyIG9mIHNlc3Npb25zIAojIyMgVGltZXNlcmllcyBzcGVlZCBhdmVyYWdlIHBlciB3YXlfaWQKCmBgYHtyIGVjaG89RkFMU0UsIG1lc3NhZ2U9RkFMU0V9CmxhcHBseSgxOjEyLCBGVU4gPSB0c2VyaWVzX25zZXNzaW9uKQpgYGAKCiMjIEludGVyc2Vzc2lvbiB0aW1lIAoKYGBge3J9CmxhcHBseSgxOjEyLCBGVU4gPSBpbnRlcl9oKQpgYGAKCgo=